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Polynomial Evaluation and Comparison Program No. CI-I36 

DESCRIPTION 

The user supplies the coefficients of a polynomial, f (x), and a series 
of points (x,y . ). For each point the program calculates and prints 

y ,„ = f(x), the ratio y . /y ., , and the cumulative sum of the 

"calc " 'given' ^calc' p 

squared deviations Z[y _ - y . ] . 

"'calc ''given 

OPERATING PROCEDURE 

1) Load a program input routine, preferably 10.4. 

2) Input 24.0, preferably with Lo = 1100, followed by 11.6-12.6. 

3) Input the program. [The program tape consists of title, abbreviated 
program description, tape feed, ". 0000000 '", the coding, and 

" ; 0006300 ' . 0000000 ' " . ] 

4) Change program locations 0050,0051,0103,0104 to Lo of 24.0, if not 1100. 
Change program locations 0047,0048 to the RU pair for the 
shift-left-and-binarize subroutine in the program input routine used, 

if not 10.4. 
5)' Transfer to Lo of the program. 

6) When the letter "n" prints out, type the degree of the polynomial 
as a one- or two-digit number, 0£n<63. 

7) When the letter "p" prints out, type the number of x values, as a 
one- or two-digit number, 0<p^63. 

8) The computer will now print out: 

a) The starting location required for the fill of the 

polynomial coefficients. 

b) The starting location required for the fill of the 

given y_ values. 

c) The starting location required for the fill of the 

x values. 

d) The last storage location used. 

Note: The floating point data is stored sequentially starting at 
Lo + 0207. Data tapes may be prepared in advance on this basis. 

9) The computer will stop at Lo + 0042. A start will lead to a call 
for the input of the data under (8) above, in 24.0 format. The 
polynomial coefficients must be supplied in descending order 
(i.e., constant term last). 

10) The following is printed out for each x value, in one line: 

a) x 

b) the calculated y value 

c). the ratio y . /y . . 
J given' ^calc 

d) L[y - y . ] , the sum being taken up to and Including 

the point in question. 

11) After all p_ lines are printed out, control is returned to the 
input step (6) above. 

STORAGE 

2 tracks and 7 sectors, plus n + 1 + 2p data storage locations 
following the program, plus location 6345, in addition to those locations 
used by 24.0. 
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Program No. CI-I36 
FLOW CHART 



START 
-7* 0000 input, binarize, store n 

0009 input, binarize, store p_ 

0022 calculate and print addresses: 

Lo polynomial coefficients 

Lo list of y . values 
=-given 

Lo list of x values 

last storage location used 

00^2 STOP 

0050 input floating point data 

005^ initialize loc y. . and loc x, 

x given i 

OO55 clear -working storage T„ 

-^evaluate f(x): 0062 clear working storage T, 

0100 carriage return, initialize loc a. 

0103 enter floating point J 

r-^. 0106 T^ + a — > T. 

0110 increment loc a. and check against flag: 





{ 



if j^n 
if J>n 



01li+ print x 

Print ricalc =f (*i> = T 1 

0118 calculate and print y. /y 

J i given/ 'i calc 

0121 calculate and print L[y , - y. ] 2 

1 calc ''i given 

0129 exit floating point 

0130 increment loc x. and loc y J ., 

1 i given 

and check against flag: 



if not last x 
if last x 
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